functor
import
   Tk
define
   W = {New Tk.toplevel tkInit(background: white)}

   fun {NewLabels}
      {Map ['label' 'second label widget' '3rd label']
       fun {$ A}
          {New Tk.label tkInit(parent:W text:A)}
       end}
   end

   [L1 L2 L3] = {NewLabels}
%   {Tk.send pack(L1 L2 L3 padx:15)}
%    {Tk.send pack(b({NewLabels}) padx:1 pady:1 anchor:w fill:x)}
   {Tk.send pack(L1 L2 L3 padx:1 pady:1 anchor:w fill:x)}
end
